home *** CD-ROM | disk | FTP | other *** search
/ Microsoft Interactive CD Sampler / Microsoft Interactive CD Sampler.iso / DEMOS / C_Automp / AUTOTP / IMD.CST / 00003.ls next >
Encoding:
Text File  |  1996-07-16  |  1.1 KB  |  13 lines

  1. on initIMD sCur
  2.   -- initialize globals
  3.   global myCursors, spriteCur1, spriteCur2, spritePuppet1, spritePuppet2
  4.   if not voidP(sCur) then
  5.     --    set myCursors = [hand:[sCur,sCur+1],left:[sCur+2,sCur+3],right:[sCur+4,sCur+5],video:[sCur+6,sCur+7],mag:[sCur+8,sCur+9],sound:[sCur+10,sCur+11],return:[sCur+12,sCur+13],handOpen:[sCur+14,sCur+15],handGrab:[sCur+16,sCur+17]]
  6.   end if
  7.   set myCursors = [hand:[member 200 of castLib "IMD.CST",member 201 of castLib "IMD.CST"],left:[member 202 of castLib "IMD.CST",member 203 of castLib "IMD.CST"],right:[member 204 of castLib "IMD.CST",member 205 of castLib "IMD.CST"],video:[member 206 of castLib "IMD.CST",member 207 of castLib "IMD.CST"],mag:[member 208 of castLib "IMD.CST",member 209 of castLib "IMD.CST"],sound:[member 210 of castLib "IMD.CST",member 211 of castLib "IMD.CST"],return:[member 212 of castLib "IMD.CST",member 213 of castLib "IMD.CST"],handOpen:[member 214 of castLib "IMD.CST",member 215 of castLib "IMD.CST"],handGrab:[member 216 of castLib "IMD.CST",member 217 of castLib "IMD.CST"]]
  8.   set spriteCur1 = []
  9.   set spriteCur2 = []
  10.   set spritePuppet1 = []
  11.   set spritePuppet2 = []
  12. end 
  13.